1@  chstring) > 0 *-- Remove the last charact5photo locations.dbfprimarykeycse1photographs.dbfprimarykeyWISE 3rolls of film.dbfprimarykeyncel 8Photo Location ID8Photo Location8Photograph ID8Film ID), THIS.calias, THIS.ctag) ENDIF IF8Photo Location ID8Photo #8Date Taken8Time Taken8Place Taken8Subject Name8Subject Phone8Lens Used8Aperture8Shutter Speed8Filter Used 8Flash8Print Size 8Notes= photolocid"photo locations"primarykey8Film ID8Film Title8Film Type8Film Speed8Color Film8Film Expiration Date8Date Developed8Developed By8Camera 8Notes5 filmidrolls of filmprimarykey